home *** CD-ROM | disk | FTP | other *** search
/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_perl.idb / usr / freeware / catman / p_man / cat3 / Shell.Z / Shell
Encoding:
Text File  |  1998-10-28  |  1.4 KB  |  67 lines
  1.  
  2.  
  3.  
  4.      SSSShhhheeeellllllll((((3333))))         22223333////JJJJuuuullll////99998888 ((((ppppeeeerrrrllll 5555....000000005555,,,, ppppaaaattttcccchhhh 00002222))))          SSSShhhheeeellllllll((((3333))))
  5.  
  6.  
  7.  
  8.      NNNNAAAAMMMMEEEE
  9.       Shell    - run shell commands transparently within perl
  10.  
  11.      SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  12.       See below.
  13.  
  14.      DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
  15.         Date: Thu, 22 Sep 94 16:18:16 -0700
  16.         Message-Id:    <9409222318.AA17072@scalpel.netlabs.com>
  17.         To:    perl5-porters@isu.edu
  18.         From: Larry    Wall <lwall@scalpel.netlabs.com>
  19.         Subject: a new module I just wrote
  20.  
  21.       Here's one that'll whack your    mind a little out.
  22.  
  23.           #!/usr/bin/perl
  24.  
  25.           use Shell;
  26.  
  27.           $foo = echo("howdy", "<funny>", "world");
  28.           print $foo;
  29.  
  30.           $passwd =    cat("</etc/passwd");
  31.           print $passwd;
  32.  
  33.           sub ps;
  34.           print ps -ww;
  35.  
  36.           cp("/etc/passwd",    "/tmp/passwd");
  37.  
  38.       That's maybe too gonzo.  It actually exports an AUTOLOAD to
  39.       the current package (and uncovered a bug in Beta 3, by the
  40.       way).     Maybe the usual usage should be
  41.  
  42.           use Shell    qw(echo    cat ps cp);
  43.  
  44.       Larry
  45.  
  46.      AAAAUUUUTTTTHHHHOOOORRRR
  47.       Larry    Wall
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.      Page 1                        (printed 10/23/98)
  64.  
  65.  
  66.  
  67.